home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 26.zip / BS1 part 26 / C for beginners.adf / source / c_comp.c < prev    next >
C/C++ Source or Header  |  1978-01-17  |  794b  |  23 lines
  1. /*  Filename: "c_comp.c" */
  2. /**********************************************************************/
  3. /* Name:          c_comp                                              */
  4. /* Parameter:     c1 (char), c2 (char)                                */
  5. /* Return value:  1 (TRUE), 0 (FALSE)                                 */
  6. /* Function:      Compares two characters                             */
  7. /* Other:         requires two characters ()                          */
  8. /**********************************************************************/
  9. #define FALSE 0
  10. #define TRUE  1
  11. extern int grklflag;
  12.  
  13. c_comp(c1,c2)
  14. register char c1,c2;
  15. {
  16.   if (c1 == c2) return(TRUE);
  17.   if( grklflag && letter(c1) && letter(c2))
  18.     if((c1 + 'a' - 'A' == c2)||(c2 + 'a' - 'A' == c1)) return(TRUE);
  19.   return(FALSE);
  20. }
  21.  
  22.  
  23.